function [foc1,foc2,xc,yc,skew] =reformatK(x,w,h)

x=x';
sx=size(x,1);

if(sx==1)
    foc1=x(1,1);
    foc2=foc1;
    skew=0;
    xc=w/2;
    yc=h/2;
elseif(sx==2)
    foc1=x(1,1);
    foc2=x(2,1);
    skew=0;
    xc=w/2;
    yc=h/2;
elseif(sx==3)
    foc1=x(1,1);
    foc2=foc1;
    skew=0;
    xc=x(2,1);
    yc=x(3,1);
elseif(sx==4)
    foc1=x(1,1);
    foc2=x(2,1);
    skew=0;
    xc=x(3,1);
    yc=x(4,1);
elseif(sx==5)
    foc1=x(1,1);
    foc2=x(2,1);
    skew=x(5,1);
    xc=x(3,1);
    yc=x(4,1);
else
    error('weitd shape');
end
end